home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Games Collection 1 / software vault.zip / software vault / CDR10 / SPX20.ZIP / SPX_INT.ZIP / SPX_GEO.INT < prev    next >
Text File  |  1993-09-14  |  1KB  |  38 lines

  1. Unit spx_geo;
  2.  
  3. {$X+,O+ }
  4. { SPX Library Version 2.0  Copyright 1993 Scott D. Ramsay }
  5.  
  6. Interface
  7.  
  8. Uses spx_vga,spx_fnc;
  9.  
  10. type
  11.   Pmorph     = ^Tmorph;
  12.   Tmorph     = object
  13.                  gofsx,gofsy,ts,
  14.                  gv_width,gv_height : byte;
  15.                  gmx,gmy,gsx,gsy,
  16.                  hvx,hvy,
  17.                  smapx,smapy        : integer;
  18.                  constructor init(geomx,geomy,gvw,gvh,scrx,scry:integer);
  19.                  destructor done; virtual;
  20.                  function geomap(x,y:integer):integer;virtual;
  21.                  procedure drawmap(vx,vy:integer);virtual;
  22.                  procedure drawmap_n16(vx,vy:integer);virtual;
  23.                  procedure placegeo(x,y,geonum:integer);virtual;
  24.                  procedure nogogeo(x,y:integer);virtual;
  25.                  procedure pre_map; virtual;
  26.                  procedure post_map; virtual;
  27.                end;
  28.   PHexMorph = ^THexMorph;
  29.   THexMorph = object(Tmorph)
  30.                  oddy,oddx,eveny,evenx : integer;
  31.                  constructor init(geomx,geomy,gvw,gvh,scrx,scry:integer);
  32.                  procedure drawmap(vx,vy:integer);virtual;
  33.                  procedure drawmap_n16(vx,vy:integer);virtual;
  34.                end;
  35.  
  36. function loadGMP(f:string;var piclist,map):integer;
  37.  
  38.